{$ifdef interface}
  type TAppMemo = class(TSynEdit)
    constructor Create(AOwner: TComponent);
    private
  end;
{$endif}

{$ifdef implementation}
constructor TAppMemo.Create(AOwner: TComponent);
begin
  inherited Create(AOwner);
  self.Highlighter := TSynSQLSyn.Create(self);
  self.ClearAll;
  self.SetDefaultKeystrokes;
end;
{$endif}
